home *** CD-ROM | disk | FTP | other *** search
/ The Big Mouth 9 / Big_Mouth_The_09_1996_-_Side_A.d64 / the main menu_bm (.txt) < prev    next >
Commodore BASIC  |  2023-02-26  |  1KB  |  45 lines
  1. 1 rem"          "bm staff eyes only!(NULL)
  2. 2 poke 808,234:poke 53280,0:poke 53281,0
  3. 4 fort=1 to 500:next
  4. 6 print"[147][155]   the big mouth magazine - main menu"
  5. 8 fort=1 to 2000:next
  6. 10 print"[147]"
  7. 15 fort=1 to 500:next
  8. 20 printtab(7)"the big mouth - main menu"
  9. 30 print"a - the editorial bit"
  10. 31 print"b - stuff"
  11. 32 print"c - simba's reviews"
  12. 33 print"d - the king of c64 pd"
  13. 34 print"e - simba's arcades"
  14. 35 print"f - the c64 world"
  15. 36 print"g - amy's megadrive reviews"
  16. 37 print"h - the big mouth missives"
  17. 38 print"i - those ibm reviews"
  18. 39 print"j - the dirty rotten cheats"
  19. 40 print"k - pole position"
  20. 41 print"l - test run"
  21. 50 print"     pick a program to load (a-l) ?"
  22. 55 get a$:if a$="" then 55
  23. 60 a=asc(a$):if a-64<1 or a-64>12 then 55
  24. 65 forx=49152 to 49170:ready:poke x,y:nextx
  25. 70 print"  loading..."
  26. 75 if a-64=12 then load"test run",8
  27. 76 sys 49152
  28. 77 data 120,169,013,141,040,003,169,192
  29. 78 data 141,041,003,088,096,238,032,208
  30. 79 data 076,237,246
  31. 80 on a-64 goto 100,105,110,115,120,125,130,135,140,145,150,155
  32. 99 :
  33. 100 load"th'editorial bit",8,1
  34. 105 load"   - stuff -    ",8,1
  35. 110 load"simba's reviews ",8,1
  36. 115 load" the king of pd ",8,1
  37. 120 load"simba's arcades ",8,1
  38. 125 load" the c64 world  ",8,1
  39. 130 load"amy's md reviews",8,1
  40. 135 load"the bm missives ",8,1
  41. 140 load"those ibm review",8,1
  42. 145 load"the dirty cheats",8,1
  43. 150 a=0:load"pole position",8,1
  44. 155 load"test run",8
  45.